Tripas 2/TRIPAS 002.iso/RRRA.exe/MAMA.CON

Text File | 1998-07-02 | 12.5 KB | 711 lines

// The Mama jack o' lope
// Programmed by Joseph Aurili

// Define actions
action AMAMA_SIT    90  1  5  1  10
action AMAMA_RUN1   0   1  5  1  10
action AMAMA_RUN2   5   7  5  1  10
action AMAMA_JUMP1  90  3  5  1  10
action AMAMA_JUMP2  105 16 5  1  10
action AMAMA_FLIP1  40  12 1  1  10
action AMAMA_FLIP2  52  6  1  1  10
action AMAMA_FLIP3  58  13 1  1  10
action AMAMA_FLIP4  71  2  1  1  10
action AMAMA_FLIP5  76  6  1  1  10
action AMAMA_HIT    80  8  1  1  10

// Define movements
move MAMA_JUMPVEL   215
move MAMA_RUNVEL    215 // 115
move MAMA_FLIPVEL   320
move MAMA_HITVEL    1
move MAMA_STOP

// Define AI states
ai AIMAMA_SIT    AMAMA_SIT    MAMA_STOP
ai AIMAMA_WAIT   AMAMA_SIT    MAMA_STOP
ai AIMAMA_RUN1   AMAMA_RUN1   MAMA_RUNVEL  faceplayer
ai AIMAMA_RUN2   AMAMA_RUN2   MAMA_RUNVEL  faceplayer
ai AIMAMA_AJUMP1 AMAMA_JUMP1  MAMA_STOP    randomangle geth
ai AIMAMA_AJUMP2 AMAMA_JUMP2  MAMA_JUMPVEL justjump1
ai AIMAMA_JUMP1  AMAMA_JUMP1  MAMA_STOP    faceplayer
ai AIMAMA_JUMP2  AMAMA_JUMP2  MAMA_JUMPVEL justjump2
ai AIMAMA_FLIP1  AMAMA_FLIP1  MAMA_STOP    faceplayer
ai AIMAMA_FLIP2  AMAMA_FLIP2  MAMA_FLIPVEL faceplayer
ai AIMAMA_FLIP3  AMAMA_FLIP3  MAMA_STOP    faceplayer
ai AIMAMA_FLIP4  AMAMA_FLIP4  MAMA_FLIPVEL faceplayer
ai AIMAMA_FLIP5  AMAMA_FLIP5  MAMA_STOP    faceplayer
ai AIMAMA_HIT    AMAMA_HIT    MAMA_HITVEL  faceplayer

// Actors ********************************************
actor MAMA 2000 AMAMA_SIT
  fall

  // Start with the sit
  ifai 0
  {
    cstator 257
    ifspritepal 30
      strength 1000
    else ifspritepal 31
      strength 2000
    else ifspritepal 32
      strength 3000
    ai AIMAMA_WAIT
  }

  ifai AIMAMA_WAIT
  {
      ifcansee
        ifp palive
        {
          ifrnd 128
          {
            globalsound MJ_RECO1
          }
          else
          {
            globalsound MJ_RECO2
          }
          ai AIMAMA_SIT
        }
  }
  // Just jump around
  else ifai AIMAMA_AJUMP1
  {
    ifrnd 128
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifactioncount 3
    {
      ai AIMAMA_AJUMP2
    }
    else ifactioncount 2
    {

    }
    else ifactioncount 1
    {
      // sound JACKJMP1
    }

    ifpdistl 1000
    {
       ifp palive
         move MAMA_STOP
    }
  }
  else ifai AIMAMA_AJUMP2
  {
    ifrnd 5
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifactioncount 16
    {
      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -5
          else ifspritepal 31
            addphealth -10
          else ifspritepal 32
            addphealth -15
          state lnsndpain
        }
      }

      ai AIMAMA_SIT
    }
    else ifactioncount 13
    {

    }
    else ifactioncount 12
    {
      ifpdistl 20000
        mamaquake
    }
    else ifactioncount 11
    {

    }
    else ifactioncount 10
    {
      sound MJ_JUMP
    }


    ifpdistl 1000
    {
       ifp palive
         move MAMA_STOP
    }
    else ifactioncount 10
    {
      move MAMA_STOP
    }
  }
  // Just to player
  else ifai AIMAMA_JUMP1
  {
    ifrnd 5
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifactioncount 3
    {
      ai AIMAMA_JUMP2
    }
    else ifactioncount 2
    {

    }
    else ifactioncount 1
    {
      // sound JACKJMP2
    }

    ifpdistl 1000
    {
       ifp palive
         move MAMA_STOP
    }
  }
  else ifai AIMAMA_JUMP2
  {
    ifrnd 5
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifactioncount 16
    {
      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -5
          else ifspritepal 31
            addphealth -10
          else ifspritepal 32
            addphealth -15
          state lnsndpain
        }
      }

      ai AIMAMA_SIT
    }
    else ifactioncount 13
    {

    }
    else ifactioncount 12
    {
      ifpdistl 20000
        mamaquake
    }
    else ifactioncount 11
    {

    }
    else ifactioncount 10
    {
      sound MJ_JUMP
    }

    ifpdistl 1000
    {
       ifp palive
         move MAMA_STOP
    }
    else ifactioncount 10
    {
      move MAMA_STOP
    }
  }

  // Sit and make the next action choice
  else ifai AIMAMA_SIT
  {
    ifrnd 5
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifp palive
    {
      ifpdistl 2000
      {
        ifcansee
        {
          ai AIMAMA_HIT
        }
        else
        {
          ai AIMAMA_JUMP1
        }
      }
      ifpdistl 5000
      {
        ifcansee
        {
          ifrnd 64
          {
            ai AIMAMA_FLIP1
          }
          else
          {
            ai AIMAMA_JUMP1
          }
        }
        else
        {
          ai AIMAMA_JUMP1
        }
      }
      else ifpdistl 12000
      {
        ifcansee
        {
          ifrnd 128
          {
            ai AIMAMA_RUN1
          }
          else ifrnd 128
          {
            ai AIMAMA_JUMP1
          }
          else
          {
            ai AIMAMA_AJUMP1
          }
        }
        else
        {
          ifrnd 64
          {
            ai AIMAMA_JUMP1
          }
          else
          {
            ai AIMAMA_AJUMP1
          }
        }
      }
      else ifpdistl 12000
      {
        ifcansee
        {
          ifrnd 32
          {
            ai AIMAMA_JUMP1
          }
          else ifrnd 128
          {
            ai AIMAMA_RUN1
          }
        }
        else
        {
          ifrnd 64
          {
            ai AIMAMA_JUMP1
          }
          else
          {
            ai AIMAMA_AJUMP1
          }
        }
      }
      else
      {
        ifrnd 10
          ai AIMAMA_AJUMP1
      }
    }
    // Player has expired
    else
    {
      ifrnd 64
        ai AIMAMA_AJUMP1
    }
  }
  // Close-up attack of player
  else ifai AIMAMA_HIT
  {
    ifactioncount 1
    {
      sound MJ_ATTK1
    }

    ifactioncount 8
    {
      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -10
          else ifspritepal 31
            addphealth -15
          else ifspritepal 32
            addphealth -20
          state lnsndpain
        }
      }

      ai AIMAMA_SIT
    }
    else ifactioncount 2
    {

    }
    else ifactioncount 1
    {
      sound MJ_ATTK1
    }
  }
  else ifai AIMAMA_FLIP1
  {
    ifactioncount 12
    {
      ai AIMAMA_FLIP2
    }
    else ifactioncount 1
    {
      ifpdistl 1000
      {
        move MAMA_STOP
      }
    }
  }
  else ifai AIMAMA_FLIP2
  {
    ifactioncount 6
    {
      move MAMA_STOP
      ai AIMAMA_FLIP3
      ifspritepal 31
      {
        spawn MAMACLOUD
      }
      else ifspritepal 32
      {
        spawn MAMACLOUD
      }
    }
    else ifactioncount 5
    {
      ifspritepal 30
        shoot SHITBALL
      else ifspritepal 32
        shoot SHITBALL
      move MAMA_STOP
      ifspritepal 31
      {
        spawn MAMACLOUD
      }
      else ifspritepal 32
      {
        spawn MAMACLOUD
      }
    }
    else ifactioncount 4
    {
      ifspritepal 30
        shoot SHITBALL
      else ifspritepal 32
        shoot SHITBALL
      ifspritepal 31
      {
        sound MJ_FART
        spawn MAMACLOUD
      }
      else ifspritepal 32
      {
        sound MJ_FART
        spawn MAMACLOUD
      }
    }
    else ifactioncount 3
    {
      ifspritepal 30
        shoot SHITBALL
      else ifspritepal 32
        shoot SHITBALL
    }
    else ifactioncount 2
    {
      ifspritepal 30
        shoot SHITBALL
      else ifspritepal 32
        shoot SHITBALL
    }
    else ifactioncount 1
    {
      ifspritepal 30
        shoot SHITBALL
      else ifspritepal 32
        shoot SHITBALL
      move MAMA_STOP

      ifpdistl 5000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -5
          else ifspritepal 31
            addphealth -7
          else ifspritepal 32
            addphealth -10
          state lnsndpain
        }
      }
      ifpdistl 15000
      {
        mamaquake
      }
    }
    else ifactioncount 0
    {
      sound MJ_ROLL
    }
  }
  else ifai AIMAMA_FLIP3
  {
    ifactioncount 13
    {
      ai AIMAMA_FLIP4
    }
    else ifactioncount 1
    {
      ifpdistl 1000
      {
        move MAMA_STOP
      }
    }
  }
  else ifai AIMAMA_FLIP4
  {
    ifactioncount 2
    {
      ai AIMAMA_FLIP5
    }
    else ifactioncount 1
    {
      move MAMA_STOP

      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -1
          else ifspritepal 31
            addphealth -2
          else ifspritepal 32
            addphealth -5
          state lnsndpain
        }
      }
    }
  }
  else ifai AIMAMA_FLIP5
  {
    ifactioncount 6
    {
      ai AIMAMA_SIT
    }
    else ifactioncount 1
    {
      move MAMA_STOP

      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -1
          else ifspritepal 31
            addphealth -2
          else ifspritepal 32
            addphealth -5
          state lnsndpain
        }
      }
    }
  }
  // Run to player
  else ifai AIMAMA_RUN1
  {
    ifrnd 5
    {
      ifrnd 128
      {
        sound MJ_ROAM1
      }
      else
      {
        sound MJ_ROAM2
      }
    }

    ifactioncount 1
    {
      ai AIMAMA_RUN2
    }
  }
  else ifai AIMAMA_RUN2
  {
    ifactioncount 7
    {
      ifpdistl 2000
      {
        ai AIMAMA_SIT
      }
      else
      {
        ifrnd 128
        {
          ai AIMAMA_RUN1
        }
        else
        {
          ai AIMAMA_SIT
        }
      }
    }
    else ifactioncount 6
    {
      ifpdistl 1000
      {
        ifp palive
        {
          move MAMA_STOP
          ifspritepal 30
            addphealth -10
          else ifspritepal 31
            addphealth -15
          else ifspritepal 32
            addphealth -20
          state lnsndpain
        }
      }
    }
  }

  // Mama jack o' lope takes a hit
  ifhitweapon
  {
    state random_wall_jibs
    spawn BLOOD
    ifrnd 190
    {
      sound MJ_PAIN1
    }
    else
    {
      sound MJ_PAIN2
    }
    // move MAMA_STOP
    ifrnd 64
      mamaspawn

    ifdead
    {
      // RIP jack o' lope
      addkills 1
      sound SQUISHED
      ifrnd 128
      {
        globalsound MJ_JIB1
      }
      else
      {
        globalsound MJ_JIB2
      }
      move MAMA_STOP
      guts JIBS2 1
      guts JIBS3 2
      guts JIBS4 3
      guts MAMAJIBA 3
      guts MAMAJIBB 1
      ifspritepal 30
      {
        mamatrigger
      }
      else ifspritepal 31
      {
        guts JIBS2 1
        guts JIBS3 2
        guts JIBS4 3
        guts MAMAJIBA 3
        guts MAMAJIBB 1
        mamatrigger
      }
      else ifspritepal 32
      {
        guts JIBS2 2
        guts JIBS3 4
        guts JIBS4 6
        guts MAMAJIBA 6
        guts MAMAJIBB 2
        mamaend
        // endofgame 3
      }
      killit
    }
  }
enda